home *** CD-ROM | disk | FTP | other *** search
/ Collection of Tools & Utilities / Collection of Tools and Utilities.iso / print / gs261sr1.zip / GDEVWPRN.C < prev    next >
C/C++ Source or Header  |  1993-05-12  |  19KB  |  646 lines
  1. /* Copyright (C) 1989, 1992, 1993 Aladdin Enterprises.  All rights reserved.
  2.  
  3. This file is part of Ghostscript.
  4.  
  5. Ghostscript is distributed in the hope that it will be useful, but
  6. WITHOUT ANY WARRANTY.  No author or distributor accepts responsibility
  7. to anyone for the consequences of using it or for whether it serves any
  8. particular purpose or works at all, unless he says so in writing.  Refer
  9. to the Ghostscript General Public License for full details.
  10.  
  11. Everyone is granted permission to copy, modify and redistribute
  12. Ghostscript, but only under the conditions described in the Ghostscript
  13. General Public License.  A copy of this license is supposed to have been
  14. given to you along with Ghostscript so you can know your rights and
  15. responsibilities.  It should be in a file named COPYING.  Among other
  16. things, the copyright notice and this notice must be preserved on all
  17. copies.  */
  18.  
  19. /* gdevwprn.c */
  20. /*
  21.  * Microsoft Windows 3.n printer driver for Ghostscript.
  22.  * Original version by Russell Lang and
  23.  * L. Peter Deutsch, Aladdin Enterprises.
  24.  */
  25. #include "gdevmswn.h"
  26. #include "gp.h"
  27. #include "commdlg.h"
  28.  
  29. /*
  30.  ****** NOTE: this module and gdevwddb should be refactored.
  31.  * The drawing routines are almost identical.
  32.  * The differences are that the mswinprn doesn't use an extra
  33.  * palette (gdevwddb.c could probably be made to work with 
  34.  * one palette also), mswinprn doesn't call win_update() because
  35.  * hwndimg doesn't exist, and the HDC is hdcmf not hdcbit.
  36.  ******/
  37.  
  38. /* Make sure we cast to the correct structure type. */
  39. typedef struct gx_device_win_prn_s gx_device_win_prn;
  40. #undef wdev
  41. #define wdev ((gx_device_win_prn *)dev)
  42.  
  43. /* Forward references */
  44. private void near win_prn_addtool(P2(gx_device_win_prn *, int));
  45. private void near win_prn_maketools(P2(gx_device_win_prn *, HDC));
  46. private void near win_prn_destroytools(P1(gx_device_win_prn *));
  47.  
  48. /* Device procedures */
  49.  
  50. /* See gxdevice.h for the definitions of the procedures. */
  51. private dev_proc_open_device(win_prn_open);
  52. private dev_proc_close_device(win_prn_close);
  53. private dev_proc_sync_output(win_prn_sync_output);
  54. private dev_proc_output_page(win_prn_output_page);
  55. private dev_proc_map_rgb_color(win_prn_map_rgb_color);
  56. private dev_proc_fill_rectangle(win_prn_fill_rectangle);
  57. private dev_proc_tile_rectangle(win_prn_tile_rectangle);
  58. private dev_proc_copy_mono(win_prn_copy_mono);
  59. private dev_proc_copy_color(win_prn_copy_color);
  60. private dev_proc_draw_line(win_prn_draw_line);
  61.  
  62. /* The device descriptor */
  63. struct gx_device_win_prn_s {
  64.     gx_device_common;
  65.     gx_device_win_common;
  66.  
  67.     /* Handles */
  68.  
  69.     HPEN hpen, *hpens;
  70.     uint hpensize;
  71.     HBRUSH hbrush, *hbrushs;
  72.     uint hbrushsize;
  73. #define select_brush(color)\
  74.   if (wdev->hbrush != wdev->hbrushs[color])\
  75.    {    wdev->hbrush = wdev->hbrushs[color];\
  76.     SelectObject(wdev->hdcmf,wdev->hbrush);\
  77.    }
  78.     /* A staging bitmap for copy_mono. */
  79.     /* We want one big enough to handle the standard 16x16 halftone; */
  80.     /* this is also big enough for ordinary-size characters. */
  81.  
  82. #define bmWidthBytes 4        /* must be even */
  83. #define bmWidthBits (bmWidthBytes * 8)
  84. #define bmHeight 32
  85.     HBITMAP FAR hbmmono;
  86.     HDC FAR hdcmono;
  87.     gx_bitmap_id bm_id;
  88.  
  89.     HDC hdcprn;
  90.     HDC hdcmf;
  91.     char mfname[128];
  92.     DLGPROC lpfnAbortProc;
  93. };
  94. private gx_device_procs win_prn_procs = {
  95.     win_prn_open,
  96.     gx_default_get_initial_matrix,
  97.     win_prn_sync_output,
  98.     win_prn_output_page,
  99.     win_prn_close,
  100.     win_prn_map_rgb_color,
  101.     win_map_color_rgb,
  102.     win_prn_fill_rectangle,
  103.     win_prn_tile_rectangle,
  104.     win_prn_copy_mono,
  105.     win_prn_copy_color,
  106.     win_prn_draw_line,
  107.     gx_default_get_bits,
  108.     gx_default_get_props,
  109.     gx_default_put_props,
  110.     gx_default_map_cmyk_color,
  111.     win_get_xfont_procs
  112. };
  113. gx_device_win_prn gs_mswinprn_device = {
  114.     sizeof(gx_device_win_prn),
  115.     &win_prn_procs,
  116.     "mswinprn",
  117.     INITIAL_WIDTH, INITIAL_HEIGHT,     /* win_prn_open() fills these in later */
  118.     INITIAL_RESOLUTION, INITIAL_RESOLUTION,    /* win_prn_open() fills these in later */
  119.     no_margins,
  120.     dci_black_and_white,
  121.     0,        /* not open yet */
  122.     2,        /* nColors */
  123. };
  124.  
  125. /* Open the win_prn driver */
  126. private int
  127. win_prn_open(gx_device *dev)
  128. {    int depth;
  129.     PRINTDLG pd;
  130.     FILE *f;
  131.     POINT offset;
  132.     POINT size;
  133.  
  134.     _fmemset(&pd, 0, sizeof(PRINTDLG));
  135.     pd.lStructSize = sizeof(PRINTDLG);
  136.     pd.hwndOwner = hwndtext;
  137.     pd.Flags = PD_PRINTSETUP | PD_RETURNDC;
  138.     if (!PrintDlg(&pd)) {
  139.         /* device not opened - exit ghostscript */
  140.         return gs_error_limitcheck;
  141.     }
  142.     GlobalFree(pd.hDevMode);
  143.     GlobalFree(pd.hDevNames);
  144.     pd.hDevMode = pd.hDevNames = NULL;
  145.     wdev->hdcprn = pd.hDC;
  146.     if (!(GetDeviceCaps(wdev->hdcprn, RASTERCAPS) != RC_BITBLT)) {
  147.         DeleteDC(wdev->hdcprn);
  148.         return gs_error_limitcheck;
  149.     }
  150.  
  151.     wdev->lpfnAbortProc = (DLGPROC)MakeProcInstance((FARPROC)AbortProc,phInstance);
  152.     Escape(wdev->hdcprn,SETABORTPROC,0,(LPSTR)wdev->lpfnAbortProc,NULL);  
  153.     if (Escape(wdev->hdcprn, STARTDOC, strlen(szAppName),szAppName, NULL) <= 0) {
  154.         FreeProcInstance((FARPROC)wdev->lpfnAbortProc);
  155.         DeleteDC(wdev->hdcprn);
  156.         return gs_error_limitcheck;
  157.     }
  158.  
  159.     f = gp_open_scratch_file(gp_scratch_file_name_prefix, 
  160.             wdev->mfname, "wb");
  161.     if (f == (FILE *)NULL) {
  162.         Escape(wdev->hdcprn,ENDDOC,0,NULL,NULL);
  163.         FreeProcInstance((FARPROC)wdev->lpfnAbortProc);
  164.         DeleteDC(wdev->hdcprn);
  165.         return  gs_error_limitcheck;
  166.     }
  167.     unlink(wdev->mfname);
  168.     wdev->hdcmf = CreateMetaFile(wdev->mfname);
  169.  
  170.     dev->x_pixels_per_inch = GetDeviceCaps(wdev->hdcprn, LOGPIXELSX);
  171.     dev->y_pixels_per_inch = GetDeviceCaps(wdev->hdcprn, LOGPIXELSY);
  172.     Escape(wdev->hdcprn, GETPHYSPAGESIZE, NULL, NULL, (LPPOINT)&size);
  173.     dev->width = size.x;
  174.     dev->height = size.y;
  175.     Escape(wdev->hdcprn, GETPRINTINGOFFSET, NULL, NULL, (LPPOINT)&offset);
  176.     dev->l_margin = offset.x / dev->x_pixels_per_inch;
  177.     dev->t_margin = offset.y / dev->y_pixels_per_inch;
  178.     dev->r_margin =
  179.         (size.x - offset.x - GetDeviceCaps(wdev->hdcprn, HORZRES))
  180.          / dev->x_pixels_per_inch;
  181.     dev->b_margin =
  182.         (size.y - offset.y - GetDeviceCaps(wdev->hdcprn, VERTRES))
  183.          / dev->y_pixels_per_inch
  184.         + 0.15;  /* hack to add a bit more margin for deskjet printer */
  185.  
  186.     wdev->hdctext = NULL;
  187.  
  188.     /* Set parameters that were unknown before opening device */
  189.     /* Find out if the device supports color */
  190.     /* We recognize 2, 16 or 256 color devices */
  191.     depth = GetDeviceCaps(wdev->hdcprn,PLANES) * GetDeviceCaps(wdev->hdcprn,BITSPIXEL);
  192.     if ( depth >= 8 ) { /* use 64 static colors and 166 dynamic colors from 8 planes */
  193.         static const gx_device_color_info win_256color = dci_color(8,31,4);
  194.         dev->color_info = win_256color;
  195.         wdev->nColors = 64;
  196.     }
  197.     else if ( depth >= 4 ) {
  198.         static const gx_device_color_info win_16ega_color = dci_color(4, 2, 3);
  199.         dev->color_info = win_16ega_color;
  200.         wdev->nColors = 16;
  201.     } 
  202.     else {   /* default is black_and_white */
  203.         wdev->nColors = 2;
  204.     }
  205.  
  206.     /* create palette for display */
  207.     if ((wdev->limgpalette = win_makepalette((gx_device_win *)dev))
  208.         == (LPLOGPALETTE)NULL) {
  209.         HMETAFILE hmf = CloseMetaFile(wdev->hdcmf);
  210.         DeleteMetaFile(hmf);
  211.         unlink(wdev->mfname);
  212.         Escape(wdev->hdcprn,ENDDOC,0,NULL,NULL);
  213.             FreeProcInstance((FARPROC)wdev->lpfnAbortProc);
  214.             DeleteDC(wdev->hdcprn);
  215.         return win_nomemory();
  216.     }
  217.     wdev->himgpalette = CreatePalette(wdev->limgpalette);
  218.  
  219.     /* Create the bitmap and DC for copy_mono. */
  220.     wdev->hbmmono = CreateBitmap(bmWidthBits, bmHeight, 1, 1, NULL);
  221.     wdev->hdcmono = CreateCompatibleDC(wdev->hdcprn);
  222.     if ( wdev->hbmmono == NULL || wdev->hdcmono == NULL ) {
  223.         HMETAFILE hmf = CloseMetaFile(wdev->hdcmf);
  224.         DeleteMetaFile(hmf);
  225.         unlink(wdev->mfname);
  226.         Escape(wdev->hdcprn,ENDDOC,0,NULL,NULL);
  227.             FreeProcInstance((FARPROC)wdev->lpfnAbortProc);
  228.             DeleteDC(wdev->hdcprn);
  229.         gs_free((char *)(wdev->limgpalette), 1, sizeof(LOGPALETTE) + 
  230.             (1<<(wdev->color_info.depth)) * sizeof(PALETTEENTRY),
  231.             "win_prn_open");
  232.         return win_nomemory();
  233.     }
  234.     SetMapMode(wdev->hdcmono, GetMapMode(wdev->hdcprn));
  235.     SelectObject(wdev->hdcmono, wdev->hbmmono);
  236.     (void) SelectPalette(wdev->hdcmf,wdev->himgpalette,NULL);
  237.     RealizePalette(wdev->hdcmf);
  238.     win_p